UBB.Developers Forums UBB.threads 7 Development How Do I? public_pntf_admin.pl Error

quote:

---

An error has occurred:

(RequireCode) NonCGIPath/Templates/public_pntf_admin.pl: syntax error at NonCGIPath/Templates/public_pntf_admin.pl line 338, near "} elsif"
syntax error at NonCGIPath/Templates/public_pntf_admin.pl line 340, near "}"

---

Below is Lines 330 to 350. Can anyone find anything wrong in the below script?

quote:
[qb] $location .= qq($d[3] $vars_wordlets_pntf{pntf_topic_in_forum} ) . (&GetForumRecord($f))[1] . qq();
} # end if
} elsif($gah =~ m/^(d{4})(d{4}).(d{4})$/) {
my $f = $1 + 0;
$location = qq($vars_wordlets_pntf{pntf_forum}: );
if($dontlink) {
$location .= (&GetForumRecord($f))[1];
} else {
Line 338>>>>> } elsif ($gah eq "1111") {
$location = qq($vars_wordlets_mods{extpntf_pntf});
Line 340>>>> } elsif($gah =~ m/^1(d{4})(d{6})$/) {
my $f = $1 + 0;
my $t = $2;
if ($user_profile[0]) {
my $is_one = $username ? &is_admin_or_mod($f, @user_profile) : "";
if( (&GetForumRecord($f))[6] =~ m/private/ && $is_one ne 'true' ) {
next;
} # end if
}
my @d = &GetThreadData($f, $t);
$location = qq($vars_wordlets_mods{extpntf_editing}: $d[3] $vars_wordlets_pntf{pntf_topic_in_forum} ) . (&GetForumRecord($f))[1] . qq()[/qb]